home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 February / CHIPCD_02_2002.iso / Dom i biuro / EBookReader 2.2 / eBookReaderInstall.exe / data1.cab / Program_EXEs / ReaderApp.exe / PSPROCSET / 6 < prev    next >
Encoding:
Text File  |  2001-11-27  |  2.6 KB  |  149 lines

  1. %%BeginResource: procset pdf
  2. %%Version: 5.0 6
  3. %%Copyright: Copyright 1998-2001 Adobe Systems Incorporated. All Rights Reserved.
  4. %%Title: General operators for PDF, common to all Language Levels.
  5. /cm { matrix astore concat } bd
  6. /d /setdash ld
  7. /f /fill ld
  8. /h /closepath ld
  9. /i {dup 0 eq {pop _defaultflatness} if setflat} bd
  10. /j /setlinejoin ld
  11. /J /setlinecap ld
  12. /M /setmiterlimit ld
  13. /n /newpath ld
  14. /q /gsave ld
  15. /Q /grestore ld
  16. /S /stroke ld
  17. /w /setlinewidth ld
  18. /W /clip ld
  19. /initgs {
  20. 0 setgray
  21. [] 0 d
  22. 0 j
  23. 0 J
  24. 10 M
  25. 1 w
  26. false setSA
  27. /_defaulttransfer load settransfer
  28. 0 i
  29. /RelativeColorimetric ri
  30. newpath
  31. } bd
  32. /int {
  33. dup 2 index sub 3 index 5 index sub div 6 -2 roll sub mul
  34. exch pop add exch pop
  35. } bd
  36. /limit {
  37. dup 2 index le { exch } if pop
  38. dup 2 index ge { exch } if pop
  39. } bd
  40. /domainClip {
  41. Domain aload pop 3 2 roll
  42. limit
  43. } [/Domain] bld
  44. /applyInterpFunc {
  45. 0 1 DimOut 1 sub
  46. {
  47. dup C0 exch get exch
  48. dup C1 exch get exch
  49. 3 1 roll
  50. 1 index sub
  51. 3 index
  52. N exp mul add
  53. exch
  54. currentdict /Range_lo known
  55. {
  56. dup Range_lo exch get exch
  57. Range_hi exch get
  58. 3 2 roll limit
  59. }
  60. {
  61. pop
  62. }
  63. ifelse
  64. exch
  65. } for
  66. pop
  67. } [/DimOut /C0 /C1 /N /Range_lo /Range_hi] bld
  68. /encodeInput {
  69. NumParts 1 sub
  70. 0 1 2 index
  71. {
  72. dup Bounds exch get
  73. 2 index gt
  74. { exit }
  75. { dup
  76. 3 index eq
  77. { exit }
  78. { pop } ifelse
  79. } ifelse
  80. } for
  81. 3 2 roll pop
  82. dup Bounds exch get exch
  83. dup 1 add Bounds exch get exch
  84. 2 mul
  85. dup Encode exch get exch
  86. 1 add Encode exch get
  87. int
  88. } [/NumParts /Bounds /Encode] bld
  89. /rangeClip {
  90. exch dup Range_lo exch get
  91. exch Range_hi exch get
  92. 3 2 roll
  93. limit
  94. } [/Range_lo /Range_hi] bld
  95. /applyStitchFunc {
  96. Functions exch get exec
  97. currentdict /Range_lo known {
  98. 0 1 DimOut 1 sub {
  99. DimOut 1 add -1 roll
  100. rangeClip
  101. } for
  102. } if
  103. } [/Functions /Range_lo /DimOut] bld
  104. /pdf_flushfilters
  105. {
  106. aload length
  107. { dup status
  108. 1 index currentfile ne and
  109. { dup flushfile closefile }
  110. { pop }
  111. ifelse
  112. } repeat
  113. } bd
  114. /pdf_readstring
  115. {
  116. 1 index dup length 1 sub get
  117. exch readstring pop
  118. exch pdf_flushfilters
  119. } bind def
  120. /pdf_dictOp
  121. {
  122. 3 2 roll
  123. 10 dict copy
  124. begin
  125. _Filters dup length 1 sub get def
  126. currentdict exch exec
  127. _Filters pdf_flushfilters
  128. end
  129. } [/_Filters] bld
  130. /pdf_image {{image} /DataSource pdf_dictOp} bd
  131. /pdf_imagemask {{imagemask} /DataSource pdf_dictOp} bd
  132. /pdf_shfill {{sh} /DataSource pdf_dictOp} bd
  133. /pdf_sethalftone {{sethalftone} /Thresholds pdf_dictOp} bd
  134. /pdf_maskedImage
  135. {
  136. 10 dict copy begin
  137. /miDict currentdict def
  138. /DataDict DataDict 10 dict copy def
  139. DataDict begin
  140. /DataSource
  141. _Filters dup length 1 sub get
  142. def
  143. miDict image
  144. _Filters pdf_flushfilters
  145. end
  146. end
  147. } [/miDict /DataDict /_Filters] bld
  148. %%EndResource
  149.